home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 2 / AACD 2.iso / AACD / WebSites / MailingLists / AMOSLIST.0899 / 000031_nobody_Sun Aug 8 13:36:37 1999.msg < prev    next >
Internet Message Format  |  1999-09-01  |  4KB
  1. Received: from onelist.com (pop.onelist.com [209.207.164.225])
  2.     by osf1.gmu.edu (8.8.8/8.8.8) with SMTP id NAA20514
  3.     for <mcox4@osf1.gmu.edu>; Sun, 8 Aug 1999 13:36:33 -0400 (EDT)
  4. Received: (qmail 14513 invoked by alias); 8 Aug 1999 17:37:01 -0000
  5. Received: (qmail 14439 invoked from network); 8 Aug 1999 17:36:58 -0000
  6. Received: from unknown (HELO web901.mail.yahoo.com) (128.11.23.76) by pop.onelist.com with SMTP; 8 Aug 1999 17:36:58 -0000
  7. Message-ID: <19990808173339.14895.rocketmail@web901.mail.yahoo.com>
  8. Received: from [62.188.132.247] by web901.mail.yahoo.com; Sun, 08 Aug 1999 18:33:39 BST
  9. Date: Sun, 8 Aug 1999 18:33:39 +0100 (BST)
  10. From: =?iso-8859-1?q?Claude=20Heiland-Allen?= <cheilandallen@yahoo.co.uk>
  11. To: amos-list@onelist.com
  12. Mailing-List: list amos-list@onelist.com; contact amos-list-owner@onelist.com
  13. Delivered-To: mailing list amos-list@onelist.com
  14. Precedence: bulk
  15. List-Unsubscribe: <mailto:amos-list-unsubscribe@ONElist.com>
  16. Reply-to: amos-list@onelist.com
  17. Mime-Version: 1.0
  18. Content-Type: text/plain; charset=iso-8859-1
  19. Content-Transfer-Encoding: 8bit
  20. Subject: [amos-list] Re: parallel port samplers
  21. Status: O
  22. X-Status: 
  23.  
  24. From: =?iso-8859-1?q?Claude=20Heiland-Allen?= <cheilandallen@yahoo.co.uk>
  25.  
  26.  
  27. Hi Andrew Crowe
  28.  
  29. > you know asm? excellent, thats what language they
  30. gave
  31. > it in, I just modified it to amos code. Here's what
  32. the
  33. > manual says:
  34.  
  35. I used your info to get some sampling done, the
  36. quality
  37. seems quite poor, with a strange metallic edge to it. 
  38. I'm
  39. investigating using the system timer interrupts to
  40. record
  41. at a sensible rate, rather than having delay code. 
  42. The
  43. hardware reference manual doesn't mention samplers at
  44. all.
  45. There may be some small differences between
  46. Technosound
  47. and Megalosound (which I have) samplers too.  Maybe
  48. I'm
  49. trying to sample too quickly?  (Before I put in the
  50. delay
  51. all I got was noise).
  52.  
  53. Usage of program: sample >sample.raw
  54. I use octamed to convert the unsigned data from the
  55. sampler
  56. into signed Amiga samples.
  57.  
  58. /* sample.e */
  59.  
  60. PROC main()
  61.     DEF buffer[8000] : ARRAY OF CHAR
  62.     sample(buffer, 8000)
  63.     Write(stdout, buffer, 8000)
  64. ENDPROC
  65.  
  66. PROC sample(buffer, length)
  67.     Disable()           -> turn off interrupts (is this
  68. needed?)
  69.     -> initialise
  70.     MOVE.L    length,D0
  71.     SUBQ.W    #1,D0       -> dbcc tests =-1
  72.     MOVE.L    buffer,A0
  73.     MOVE.B    #0,$BFE301    -> enable input
  74.     MOVE.B    #6,$BFD200  -> enable channels
  75.     MOVE.B    #2,$BFD000  -> select left channel (4 = right)
  76.     MOVE.L    #$BFE101,A1
  77.     -> 7 MHz processor, 22050 kHz sample rate => 324
  78. clock cycles
  79.     -> all the NOPs below waste 256 cycles
  80. loop:
  81.     MOVE.B    (A1),(A0)+
  82.     NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP;
  83. NOP;NOP;NOP;NOP;
  84.     NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP;
  85. NOP;NOP;NOP;NOP;
  86.     NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP;
  87. NOP;NOP;NOP;NOP;
  88.     NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP; NOP;NOP;NOP;NOP;
  89. NOP;NOP;NOP;NOP;
  90.     DBRA.B    D0,loop
  91.     Enable()            -> turn on interrupts
  92. ENDPROC
  93.  
  94. /* END: sample.e */
  95.  
  96.  
  97. Thanks
  98.  
  99. Claude
  100.  
  101. _____________________________________________________________
  102. DO YOU YAHOO!?
  103. Get your free @yahoo.co.uk address at http://mail.yahoo.co.uk
  104.  
  105.  
  106. --------------------------- ONElist Sponsor ----------------------------
  107.  
  108. ONElist members: don't miss out on the latest news at ONElist
  109. Join our community member news update at 
  110.  
  111. ------------------------------------------------------------------------
  112. Official AMOS WWW: http://members.xoom.com/AmosFactory/front.html